1 HOME:PRINT"";"":PRINT"SCORE= ";S:CLEAR:GETA$:PRINT:PRINT"DIFFICULTE= ";:GETA$:A=VAL(A$):Q=ID:P=30:V=20:Z=-16384:HOME:FORI=1TO24:VTABI:HTABQ:PRINT"+";:HTABP:PRINT"+";:NEXT:VTAB1:HTABV:PRINT"£":VTAB1:HTABV:GETA$
2 ON(SCRN(V-1,2)>0)GOTO1:S=S+1:Q=Q+((RND(1)>.7)*(Q<18))-((RND(1)<.3)*(Q>1):P=Q+20:VTAB24:HTABQ:PRINT"+";:FORI=1TOA:HTABQ+INT(RND(1)*19)+1:PRINT"*";:NEXT:HTABP:PRINT"+":X=PEEK(Z)-128:V=V+(X=ASC("P"))-(X=ASC("Q")):VTAB1:HTABV:PRINT"£":T=PEEK(-16336):GOTO2